home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / graphics / gnuplot / contrib / yamamoto / mac.mod < prev   
Internet Message Format  |  1992-03-18  |  53KB
  1. From sun!kekvax.kek.jp!YAMAMOTO@pixar.com Wed Mar 18 04:32:31 1992
  2. Return-Path: <sun!kekvax.kek.jp!YAMAMOTO@pixar.com>
  3. Received: from ucbvax.Berkeley.EDU by ra-next.arc.nasa.gov (NeXT-1.0 (From Sendmail 5.52)/NeXT-1.0)
  4.     id AA00715; Wed, 18 Mar 92 04:32:20 PST
  5. Received: from sun.UUCP by ucbvax.Berkeley.EDU (5.63/1.43)
  6.     id AA12248; Wed, 18 Mar 92 04:37:31 -0800
  7. Received: from sun.UUCP by pixar.com (4.1/NBN-15/PIX-10)
  8.     id AA00585; Wed, 18 Mar 92 03:54:15 PST
  9. Received: from Sun.COM (sun-barr) by sun.Eng.Sun.COM (4.1/SMI-4.1)
  10.     id AA08856; Wed, 18 Mar 92 01:25:59 PST
  11. Received: from kekvax.kek.jp ([130.87.34.1]) by Sun.COM (4.1/SMI-4.1)
  12.     id AA10482; Wed, 18 Mar 92 01:25:46 PST
  13. Message-Id: <9203180925.AA10482@Sun.COM>
  14. Date: 18 Mar 92 18:25:00 GMT+9:00
  15. From: "NOBORU YAMAMOTO     " <sun!kekvax.kek.jp!YAMAMOTO@pixar.com>
  16. Subject: Re: gnuplot on Apple Macintosh
  17. To: "pixar!ucbvax!ra-next.arc.nasa.gov!woo" <sun!ra-next.arc.nasa.gov!woo>
  18. Status: R
  19.  
  20.      Hi,
  21.  
  22.      I'm sorry for not replying your e-mail for a long time. My hard disc had
  23. crashed shortly after I wrote previous mai. I have not been able to find time
  24. to rebuild gnuplot on Mac.
  25.  
  26.      Here I enclose "diff -c" patch for gnuplot 3.0 on Mac. you also need
  27. TC-console.c and TC_console.h files , which I will send in separate e-mail. 
  28. The graphics.c file is too big for THINK-C compiler. I forced to divide it into
  29. two part.
  30.  
  31.     Hope it help someone in the world.
  32.  
  33.     Noboru Yamamoto
  34.  
  35. ---------------- diff -c <modified> <original > ---------------------
  36. Only in ../gnuplot: Makefile
  37. Only in src: TC_console.c
  38. Only in src: TC_console.h
  39. diff -c src/bitmap.c ../gnuplot/bitmap.c
  40. *** src/bitmap.c    Sun Feb  2 09:44:43 1992
  41. --- ../gnuplot/bitmap.c    Fri Jul 19 03:54:16 1991
  42. ***************
  43. *** 789,799 ****
  44.     b_angle = 0;
  45.     b_rastermode = 0;
  46.     /* allocate row pointers */
  47. !   b_p = (bitmap *)alloc( (size_t) rows * sizeof(pixels *), "bitmap row buffer");
  48.     bzero(b_p, rows * sizeof(pixels *));
  49.     for (j = 0; j < rows; j++) {
  50.       /* allocate bitmap buffers */
  51. !     (*b_p)[j] = (pixels *)alloc((size_t) x * sizeof(pixels),(char *)NULL);
  52.       if ((*b_p)[j] == (pixels *)NULL) {
  53.           b_freebitmap();  /* free what we have already allocated */
  54.           int_error("out of memory for bitmap buffer", NO_CARET);
  55. --- 789,799 ----
  56.     b_angle = 0;
  57.     b_rastermode = 0;
  58.     /* allocate row pointers */
  59. !   b_p = (bitmap *)alloc( rows * sizeof(pixels *), "bitmap row buffer");
  60.     bzero(b_p, rows * sizeof(pixels *));
  61.     for (j = 0; j < rows; j++) {
  62.       /* allocate bitmap buffers */
  63. !     (*b_p)[j] = (pixels *)alloc(x * sizeof(pixels),(char *)NULL);
  64.       if ((*b_p)[j] == (pixels *)NULL) {
  65.           b_freebitmap();  /* free what we have already allocated */
  66.           int_error("out of memory for bitmap buffer", NO_CARET);
  67. ***************
  68. *** 1054,1057 ****
  69.   {
  70.       b_angle=(unsigned int)ang;
  71.       return TRUE;
  72. ! }
  73. --- 1054,1057 ----
  74.   {
  75.       b_angle=(unsigned int)ang;
  76.       return TRUE;
  77. ! }
  78. diff -c src/bitmap.c ../gnuplot/bitmap.csrc/bitmap.h ../gnuplot/bitmap.h
  79. *** src/bitmap.h    Tue Jan 21 10:08:49 1992
  80. --- ../gnuplot/bitmap.h    Tue Jun  4 07:25:57 1991
  81. ***************
  82. *** 29,39 ****
  83.   
  84.   
  85.   typedef unsigned char pixels;  /* the type of one set of 8 pixels in bitmap */
  86. - #ifdef THINK_C
  87. - typedef pixels **bitmap;  /* the bitmap */
  88. - #else
  89.   typedef pixels *bitmap[];  /* the bitmap */
  90. - #endif
  91.   
  92.   extern bitmap *b_p;                        /* global pointer to bitmap */
  93.   extern unsigned int b_currx, b_curry;    /* the current coordinates */
  94. --- 29,35 ----
  95. diff -c src/bitmap.h ../gnuplot/bitmap.hsrc/command.c ../gnuplot/command.c
  96. *** src/command.c    Sat Jan 25 11:25:12 1992
  97. --- ../gnuplot/command.c    Tue Sep 24 23:51:22 1991
  98. ***************
  99. *** 90,107 ****
  100.    * instead of <strings.h>
  101.    */
  102.   
  103. - #ifdef THINK_C
  104. - extern char *gets(),*getenv(); 
  105. - extern char *strcpy(char *, char *);
  106. - extern char *strncpy(char *, char *, size_t);
  107. - extern char *strcat(char *, char *);
  108. - extern int strcmp(char *, char *);
  109. - extern size_t strlen(char *);
  110. - #else
  111.   extern char *gets(),*getenv();
  112.   extern char *strcpy(),*strncpy(),*strcat();
  113.   extern int strlen(), strcmp();
  114. - #endif
  115.   
  116.   /*
  117.    * Only reference to contours library.
  118. --- 90,98 ----
  119. ***************
  120. *** 287,308 ****
  121.       else if (almost_equals(c_token,"sa$ve")) {
  122.           if (almost_equals(++c_token,"f$unctions")) {
  123.               if (!isstring(++c_token))
  124. - #ifdef THINK_C
  125. -             {     Point where={97,103};
  126. -                 SFReply reply;
  127. -                 
  128. -                 SFPutFile(where,NULL, "\pUntitled",NULL, &reply);
  129. -                 if( (reply.good) && (SetVol(reply.fName,reply.vRefNum) == noErr)){
  130. -                     PtoCstr((char *) reply.fName);
  131. -                     save_functions(fopen((char *) reply.fName,"w"));    
  132. -                 }
  133. -                 else{
  134. -                     int_error("expecting filename",c_token);
  135. -                 }
  136. -             }
  137. - #else
  138.                   int_error("expecting filename",c_token);
  139. - #endif
  140.               else {
  141.                   quote_str(sv_file,c_token);
  142.                   save_functions(fopen(sv_file,"w"));
  143. --- 278,284 ----
  144. ***************
  145. *** 310,331 ****
  146.           }
  147.           else if (almost_equals(c_token,"v$ariables")) {
  148.               if (!isstring(++c_token))
  149. - #ifdef THINK_C
  150. -             {     Point where={97,103};
  151. -                 SFReply reply;
  152. -                 
  153. -                 SFPutFile(where,NULL, NULL,NULL, &reply);
  154. -                 if( (reply.good) && (SetVol(reply.fName,reply.vRefNum) == noErr)){
  155. -                     PtoCstr((char *) reply.fName);
  156. -                     save_variables(fopen((char *) reply.fName,"w"));    
  157. -                 }
  158. -                 else{
  159. -                     int_error("expecting filename",c_token);
  160. -                 }
  161. -             }
  162. - #else
  163.                   int_error("expecting filename",c_token);
  164. - #endif
  165.               else {
  166.                   quote_str(sv_file,c_token);
  167.                   save_variables(fopen(sv_file,"w"));
  168. --- 286,292 ----
  169. ***************
  170. *** 333,354 ****
  171.           }
  172.           else if (almost_equals(c_token,"s$et")) {
  173.               if (!isstring(++c_token))
  174. - #ifdef THINK_C
  175. -             {     Point where={97,103};
  176. -                 SFReply reply;
  177. -                 
  178. -                 SFPutFile(where,NULL, NULL,NULL, &reply);
  179. -                 if( (reply.good) && (SetVol(reply.fName,reply.vRefNum) == noErr)){
  180. -                     PtoCstr((char *) reply.fName);
  181. -                     save_set(fopen((char *) reply.fName,"w"));    
  182. -                 }
  183. -                 else{
  184. -                     int_error("expecting filename",c_token);
  185. -                 }
  186. -             }
  187. - #else
  188.                   int_error("expecting filename",c_token);
  189. - #endif
  190.               else {
  191.                   quote_str(sv_file,c_token);
  192.                   save_set(fopen(sv_file,"w"));
  193. --- 294,300 ----
  194. ***************
  195. *** 359,406 ****
  196.               save_all(fopen(sv_file,"w"));
  197.           }
  198.           else {
  199. - #ifdef THINK_C
  200. -             Point where={97,103};
  201. -             SFReply reply;
  202. -             
  203. -             SFPutFile(where,NULL, NULL,NULL, &reply);
  204. -             if( (reply.good) && (SetVol(reply.fName,reply.vRefNum) == noErr)){
  205. -                 PtoCstr((char *) reply.fName);
  206. -                 save_all(fopen((char *) reply.fName,"w"));    
  207. -             }
  208. -             else{
  209. -                 int_error(
  210. -                 "filename or keyword 'functions', 'variables', or 'set' expected",
  211. -                 c_token);
  212. -             }
  213. - #else
  214.               int_error(
  215.           "filename or keyword 'functions', 'variables', or 'set' expected",
  216.                       c_token);
  217. - #endif
  218.           }
  219.           c_token++;
  220.       }
  221.       else if (almost_equals(c_token,"l$oad")) {
  222.           if (!isstring(++c_token))
  223. - #ifdef THINK_C
  224. -         {     Point where={97,103};
  225. -             SFReply reply;
  226. -             
  227. -             SFGetFile(where,NULL, NULL, -1,NULL,NULL, &reply);
  228. -             if( (reply.good) && (SetVol(reply.fName,reply.vRefNum) == noErr)){
  229. -                 PtoCstr((char *) reply.fName);
  230. -                 strcpy(sv_file,(char *) reply.fName);
  231. -                 printf("loading  %s \n",sv_file);
  232. -                 load_file(fopen((char *)reply.fName,"r"),(char *) reply.fName);    
  233. -                 c_token = num_tokens = 0;
  234. -             }
  235. -             else
  236. -                 int_error("expecting filename",c_token);
  237. -         }
  238. - #else
  239.               int_error("expecting filename",c_token);
  240. - #endif
  241.           else {
  242.               quote_str(sv_file,c_token);
  243.               load_file(fopen(sv_file,"r"), sv_file);    
  244. --- 305,319 ----
  245. ***************
  246. *** 2044,2050 ****
  247.       }
  248.   
  249.       if (samples < 2 || iso_samples < 2)
  250. !     int_error("samples or iso_samples < 2. Must be at least 2.\n",NO_CARET);
  251.   
  252.       xdiff = (x_max - x_min) / (samples - 1);
  253.       ydiff = (y_max - y_min) / (samples - 1);
  254. --- 1957,1963 ----
  255.       }
  256.   
  257.       if (samples < 2 || iso_samples < 2)
  258. !     int_error("samples or iso_samples < 2. Must be at least 2.\n");
  259.   
  260.       xdiff = (x_max - x_min) / (samples - 1);
  261.       ydiff = (y_max - y_min) / (samples - 1);
  262. ***************
  263. *** 2441,2447 ****
  264.      /* Ok, fix up the title to include both the xp and yp plots. */
  265.           if (xp->title && xp->title[0] != '\0') {
  266.               tlen = strlen (yp->title) + strlen (xp->title) + 3;
  267. !               new_title = alloc ((unsigned int) tlen, "string");
  268.               strcpy (new_title, xp->title);  
  269.               strcat (new_title, ", ");       /* + 2 */
  270.               strcat (new_title, yp->title);  /* + 1 = + 3 */
  271. --- 2354,2360 ----
  272.      /* Ok, fix up the title to include both the xp and yp plots. */
  273.           if (xp->title && xp->title[0] != '\0') {
  274.               tlen = strlen (yp->title) + strlen (xp->title) + 3;
  275. !           new_title = alloc ((unsigned int) tlen, "string");
  276.               strcpy (new_title, xp->title);  
  277.               strcat (new_title, ", ");       /* + 2 */
  278.               strcat (new_title, yp->title);  /* + 1 = + 3 */
  279. ***************
  280. *** 2623,2629 ****
  281.               tlen = (xp->title ? strlen(xp->title) : 0) +
  282.                      (yp->title ? strlen(yp->title) : 0) +
  283.                      (zp->title ? strlen(zp->title) : 0) + 5;
  284. !             new_title = alloc ((size_t) tlen, "string");
  285.               new_title[0] = 0;
  286.               if (xp->title) {
  287.                   strcat(new_title, xp->title);
  288. --- 2536,2542 ----
  289.               tlen = (xp->title ? strlen(xp->title) : 0) +
  290.                      (yp->title ? strlen(yp->title) : 0) +
  291.                      (zp->title ? strlen(zp->title) : 0) + 5;
  292. !             new_title = alloc ((unsigned int) tlen, "string");
  293.               new_title[0] = 0;
  294.               if (xp->title) {
  295.                   strcat(new_title, xp->title);
  296. ***************
  297. *** 2828,2840 ****
  298.   
  299.   do_shell()
  300.   {
  301. - #ifdef THINK_C
  302. -         int_error("'shell' is not supported on this version.",c_token);
  303. - #else
  304.       if ((vaxc$errno = lib$spawn()) != SS$_NORMAL) {
  305.           os_error("spawn error",NO_CARET);
  306.       }
  307. - #endif
  308.   }
  309.   
  310.   
  311. --- 2741,2749 ----
  312. ***************
  313. *** 2882,2889 ****
  314.       /* huge static variables (1k each). Instead we dynamically allocate them */
  315.       /* on the first call to this function...                     */
  316.       if (helpbuf == NULL) {
  317. !     helpbuf = alloc((size_t) MAX_LINE_LEN, "help buffer");
  318. !     prompt = alloc((size_t) MAX_LINE_LEN, "help prompt");
  319.       helpbuf[0] = prompt[0] = 0;
  320.       }
  321.   
  322. --- 2791,2798 ----
  323.       /* huge static variables (1k each). Instead we dynamically allocate them */
  324.       /* on the first call to this function...                     */
  325.       if (helpbuf == NULL) {
  326. !     helpbuf = alloc(MAX_LINE_LEN, "help buffer");
  327. !     prompt = alloc(MAX_LINE_LEN, "help prompt");
  328.       helpbuf[0] = prompt[0] = 0;
  329.       }
  330.   
  331. diff -c src/command.c ../gnuplot/command.csrc/contour.c ../gnuplot/contour.c
  332. *** src/contour.c    Wed Jan 22 08:10:28 1992
  333. --- ../gnuplot/contour.c    Fri Jul 19 03:55:53 1991
  334. ***************
  335. *** 217,223 ****
  336.                             "gnuplot_contour");
  337.   
  338.       cntr->coords = (struct coordinate *) alloc(sizeof(struct coordinate) *
  339. !                              (size_t) crnt_cntr_pt_index,
  340.                              "contour coords");
  341.       for (i=0; i<crnt_cntr_pt_index; i++) {
  342.       cntr->coords[i].x = crnt_cntr[i * 2];
  343. --- 217,223 ----
  344.                             "gnuplot_contour");
  345.   
  346.       cntr->coords = (struct coordinate *) alloc(sizeof(struct coordinate) *
  347. !                               crnt_cntr_pt_index,
  348.                              "contour coords");
  349.       for (i=0; i<crnt_cntr_pt_index; i++) {
  350.       cntr->coords[i].x = crnt_cntr[i * 2];
  351. ***************
  352. *** 903,911 ****
  353.       double dt, *tangents_x, *tangents_y;
  354.       int i;
  355.   
  356. !     tangents_x = (double *) alloc((size_t) (sizeof(double) * n),
  357.                           "contour c_s_intr");
  358. !     tangents_y = (double *) alloc((size_t) (sizeof(double) * n),
  359.                           "contour c_s_intr");
  360.   
  361.       if (n > 1) prepare_spline_interp(tangents_x, tangents_y, p_cntr, n,
  362. --- 903,911 ----
  363.       double dt, *tangents_x, *tangents_y;
  364.       int i;
  365.   
  366. !     tangents_x = (double *) alloc((unsigned) (sizeof(double) * n),
  367.                           "contour c_s_intr");
  368. !     tangents_y = (double *) alloc((unsigned) (sizeof(double) * n),
  369.                           "contour c_s_intr");
  370.   
  371.       if (n > 1) prepare_spline_interp(tangents_x, tangents_y, p_cntr, n,
  372. ***************
  373. *** 942,948 ****
  374.       int i;
  375.       double t, dt;
  376.   
  377. !     hermit_table = (table_entry *) alloc ((size_t) (sizeof(table_entry) *
  378.                           (num_approx_pts + 1)),
  379.                           "contour hermit table");
  380.       t = 0;
  381. --- 942,948 ----
  382.       int i;
  383.       double t, dt;
  384.   
  385. !     hermit_table = (table_entry *) alloc ((unsigned) (sizeof(table_entry) *
  386.                           (num_approx_pts + 1)),
  387.                           "contour hermit table");
  388.       t = 0;
  389. ***************
  390. *** 1016,1024 ****
  391.       tri_diag *m;           /* The tri-diagonal matrix is saved here. */
  392.       struct cntr_struct *p;
  393.   
  394. !     m = (tri_diag *) alloc((size_t) (sizeof(tri_diag) * n),
  395.                           "contour tri_diag");
  396. !     r = (double *) alloc((size_t) (sizeof(double) * n),
  397.                           "contour tri_diag2");
  398.       n--;
  399.   
  400. --- 1016,1024 ----
  401.       tri_diag *m;           /* The tri-diagonal matrix is saved here. */
  402.       struct cntr_struct *p;
  403.   
  404. !     m = (tri_diag *) alloc((unsigned) (sizeof(tri_diag) * n),
  405.                           "contour tri_diag");
  406. !     r = (double *) alloc((unsigned) (sizeof(double) * n),
  407.                           "contour tri_diag2");
  408.       n--;
  409.   
  410. ***************
  411. *** 1182,1190 ****
  412.       int i, p;
  413.       double ti, tikp, *dx, *dy;      /* Copy p_cntr into it to make it faster. */
  414.   
  415. !     dx = (double *) alloc((size_t) (sizeof(double) * (order + j)),
  416.                           "contour b_spline");
  417. !     dy = (double *) alloc((size_t) (sizeof(double) * (order + j)),
  418.                           "contour b_spline");
  419.       /* Set the dx/dy - [0] iteration step, control points (p==0 iterat.): */
  420.       for (i=j-order; i<=j; i++) {
  421. --- 1182,1190 ----
  422.       int i, p;
  423.       double ti, tikp, *dx, *dy;      /* Copy p_cntr into it to make it faster. */
  424.   
  425. !     dx = (double *) alloc((unsigned) (sizeof(double) * (order + j)),
  426.                           "contour b_spline");
  427. !     dy = (double *) alloc((unsigned) (sizeof(double) * (order + j)),
  428.                           "contour b_spline");
  429.       /* Set the dx/dy - [0] iteration step, control points (p==0 iterat.): */
  430.       for (i=j-order; i<=j; i++) {
  431. Only in ../gnuplot: demo
  432. Only in ../gnuplot: docs
  433. Only in src: dummyroutines.c
  434. diff -c src/contour.c ../gnuplot/contour.csrc/eval.c ../gnuplot/eval.c
  435. *** src/eval.c    Wed Jan 22 08:10:56 1992
  436. --- ../gnuplot/eval.c    Fri Jul 19 03:56:29 1991
  437. ***************
  438. *** 63,69 ****
  439.       }
  440.   
  441.       *udv_ptr = (struct udvt_entry *)
  442. !       alloc((size_t)sizeof(struct udvt_entry), "value");
  443.       (*udv_ptr)->next_udv = NULL;
  444.       copy_str((*udv_ptr)->udv_name,t_num);
  445.       (*udv_ptr)->udv_value.type = INT;    /* not necessary, but safe! */
  446. --- 63,69 ----
  447.       }
  448.   
  449.       *udv_ptr = (struct udvt_entry *)
  450. !       alloc((unsigned int)sizeof(struct udvt_entry), "value");
  451.       (*udv_ptr)->next_udv = NULL;
  452.       copy_str((*udv_ptr)->udv_name,t_num);
  453.       (*udv_ptr)->udv_value.type = INT;    /* not necessary, but safe! */
  454. ***************
  455. *** 84,90 ****
  456.           udf_ptr = &((*udf_ptr)->next_udf);
  457.       }
  458.        *udf_ptr = (struct udft_entry *)
  459. !       alloc((size_t)sizeof(struct udft_entry), "function");
  460.       (*udf_ptr)->next_udf = (struct udft_entry *) NULL;
  461.       (*udf_ptr)->definition = NULL;
  462.       (*udf_ptr)->at = NULL;
  463. --- 84,90 ----
  464.           udf_ptr = &((*udf_ptr)->next_udf);
  465.       }
  466.        *udf_ptr = (struct udft_entry *)
  467. !       alloc((unsigned int)sizeof(struct udft_entry), "function");
  468.       (*udf_ptr)->next_udf = (struct udft_entry *) NULL;
  469.       (*udf_ptr)->definition = NULL;
  470.       (*udf_ptr)->at = NULL;
  471. diff -c src/eval.c ../gnuplot/eval.csrc/graph3d.c ../gnuplot/graph3d.c
  472. *** src/graph3d.c    Wed Jan 22 08:24:06 1992
  473. --- ../gnuplot/graph3d.c    Sat Sep 21 01:36:52 1991
  474. ***************
  475. *** 36,44 ****
  476.   #include "setshow.h"
  477.   
  478.   extern char *strcpy(),*strncpy(),*strcat(),*ctime(),*tdate;
  479. - #ifdef THINK_C
  480. - extern time_t dated,time();
  481. - #else
  482.   #ifdef AMIGA_AC_5
  483.   extern time_t dated;
  484.   #else
  485. --- 36,41 ----
  486. ***************
  487. *** 48,54 ****
  488.   extern long dated,time();
  489.   #endif
  490.   #endif
  491. - #endif
  492.   
  493.   static plot3d_impulses();
  494.   static plot3d_lines();
  495. --- 45,50 ----
  496. ***************
  497. *** 612,618 ****
  498.   
  499.           x = time_xoffset * t->h_char;
  500.           y = time_yoffset * t->v_char;
  501. !         dated = time( (time_t *) 0);
  502.           tdate = ctime( &dated);
  503.           tdate[24]='\0';
  504.           if ((*t->text_angle)(1)) {
  505. --- 608,614 ----
  506.   
  507.           x = time_xoffset * t->h_char;
  508.           y = time_yoffset * t->v_char;
  509. !         dated = time( (long *) 0);
  510.           tdate = ctime( &dated);
  511.           tdate[24]='\0';
  512.           if ((*t->text_angle)(1)) {
  513. diff -c src/graph3d.c ../gnuplot/graph3d.csrc/graphics.c ../gnuplot/graphics.c
  514. *** src/graphics.c    Sat Jan 25 11:53:48 1992
  515. --- ../gnuplot/graphics.c    Tue Sep 10 05:13:19 1991
  516. ***************
  517. *** 43,51 ****
  518.   
  519.   extern char *strcpy(),*strncpy(),*strcat(),*ctime();
  520.   char *tdate;
  521. - #ifdef THINK_C
  522. - time_t dated,time();
  523. - #else
  524.   #ifdef AMIGA_AC_5
  525.   time_t dated;
  526.   #else
  527. --- 43,48 ----
  528. ***************
  529. *** 55,61 ****
  530.   long dated,time();
  531.   #endif
  532.   #endif
  533. - #endif
  534.   
  535.   void plot_impulses();
  536.   void plot_lines();
  537. --- 52,57 ----
  538. ***************
  539. *** 197,202 ****
  540. --- 193,199 ----
  541.       return(tic);
  542.   }
  543.   
  544. + 
  545.   do_plot(plots, pcount, min_x, max_x, min_y, max_y)
  546.   struct curve_points *plots;
  547.   int pcount;            /* count of plots in linked list */
  548. ***************
  549. *** 463,469 ****
  550.   
  551.           x = time_xoffset * t->h_char;
  552.           y = time_yoffset * t->v_char;
  553. !         dated = time( (time_t *) 0);
  554.           tdate = ctime( &dated);
  555.           tdate[24]='\0';
  556.           if ((*t->text_angle)(1)) {
  557. --- 460,466 ----
  558.   
  559.           x = time_xoffset * t->h_char;
  560.           y = time_yoffset * t->v_char;
  561. !         dated = time( (long *) 0);
  562.           tdate = ctime( &dated);
  563.           tdate[24]='\0';
  564.           if ((*t->text_angle)(1)) {
  565. ***************
  566. *** 1387,1393 ****
  567.            xtick(place, xformat, spacing, 1.0);
  568.       }
  569.   }
  570. - #ifndef THINK_C
  571.   
  572.   /* DRAW_SET_YTICS: draw a user tic set, y axis */
  573.   draw_set_ytics(list)
  574. --- 1384,1389 ----
  575. ***************
  576. *** 1426,1431 ****
  577. --- 1422,1428 ----
  578.          list = list->next;
  579.       }
  580.   }
  581. + 
  582.   /* draw and label a y-axis ticmark */
  583.   ytick(place, text, spacing, ticscale)
  584.           double place;                   /* where on axis to put it */
  585. ***************
  586. *** 1563,1566 ****
  587.        }
  588.       }
  589.   }
  590. - #endif
  591. --- 1560,1562 ----
  592. Only in src: graphics_1.c
  593. Only in src: graphics_2.c
  594. diff -c src/graphics.c ../gnuplot/graphics.csrc/help.c ../gnuplot/help.c
  595. *** src/help.c    Sun Feb  2 09:18:21 1992
  596. --- ../gnuplot/help.c    Thu Jul 25 00:44:31 1991
  597. ***************
  598. *** 155,161 ****
  599.   };
  600.   static LINKEY *keylist = NULL;    /* linked list of keys */
  601.   static KEY *keys = NULL;        /* array of keys */
  602. ! static size_t keycount = 0;        /* number of keys */
  603.   static FILE *helpfp = NULL;
  604.   
  605.   static int LoadHelp();
  606. --- 155,161 ----
  607.   };
  608.   static LINKEY *keylist = NULL;    /* linked list of keys */
  609.   static KEY *keys = NULL;        /* array of keys */
  610. ! static int keycount = 0;        /* number of keys */
  611.   static FILE *helpfp = NULL;
  612.   
  613.   static int LoadHelp();
  614. ***************
  615. *** 310,316 ****
  616.       if (new == NULL)
  617.        int_error("not enough memory to store help file", -1);
  618.       if (text != NULL) {
  619. !        new->line = (char *) malloc((size_t)(strlen(text)+1));
  620.          if (new->line == NULL)
  621.           int_error("not enough memory to store help file", -1);
  622.          (void) strcpy(new->line, text);
  623. --- 310,316 ----
  624.       if (new == NULL)
  625.        int_error("not enough memory to store help file", -1);
  626.       if (text != NULL) {
  627. !        new->line = (char *) malloc((unsigned int)(strlen(text)+1));
  628.          if (new->line == NULL)
  629.           int_error("not enough memory to store help file", -1);
  630.          (void) strcpy(new->line, text);
  631. ***************
  632. *** 334,340 ****
  633.       new = (LINKEY *)malloc(sizeof(LINKEY));
  634.       if (new == NULL)
  635.        int_error("not enough memory to store help file", -1);
  636. !     new->key = (char *) malloc((size_t)(strlen(key)+1));
  637.       if (new->key == NULL)
  638.        int_error("not enough memory to store help file", -1);
  639.       (void) strcpy(new->key, key);
  640. --- 334,340 ----
  641.       new = (LINKEY *)malloc(sizeof(LINKEY));
  642.       if (new == NULL)
  643.        int_error("not enough memory to store help file", -1);
  644. !     new->key = (char *) malloc((unsigned int)(strlen(key)+1));
  645.       if (new->key == NULL)
  646.        int_error("not enough memory to store help file", -1);
  647.       (void) strcpy(new->key, key);
  648. ***************
  649. *** 358,364 ****
  650.       int i;                /* index into key array */
  651.       
  652.       /* allocate the array */
  653. !     keys = (KEY *)malloc((size_t)((keycount+1) * sizeof(KEY)));
  654.       if (keys == NULL)
  655.        int_error("not enough memory to store help file", -1);
  656.       
  657. --- 358,364 ----
  658.       int i;                /* index into key array */
  659.       
  660.       /* allocate the array */
  661. !     keys = (KEY *)malloc((unsigned int)((keycount+1) * sizeof(KEY)));
  662.       if (keys == NULL)
  663.        int_error("not enough memory to store help file", -1);
  664.       
  665. diff -c src/help.c ../gnuplot/help.csrc/misc.c ../gnuplot/misc.c
  666. *** src/misc.c    Wed Jan 22 08:12:52 1992
  667. --- ../gnuplot/misc.c    Fri Aug 23 02:20:15 1991
  668. ***************
  669. *** 43,57 ****
  670.   #include <graphics.h>
  671.   #endif
  672.   
  673. ! #ifdef THINK_C
  674. ! extern void *malloc();
  675. ! extern void *realloc();
  676. ! #else
  677. ! #ifndef _IBMR2 
  678.   extern char *malloc();
  679.   extern char *realloc();
  680.   #endif
  681. - #endif
  682.   
  683.   extern int c_token;
  684.   extern char replot_line[];
  685. --- 43,52 ----
  686.   #include <graphics.h>
  687.   #endif
  688.   
  689. ! #ifndef _IBMR2
  690.   extern char *malloc();
  691.   extern char *realloc();
  692.   #endif
  693.   
  694.   extern int c_token;
  695.   extern char replot_line[];
  696. ***************
  697. *** 118,124 ****
  698.       cp->p_max = (num >= 0 ? num : 0);
  699.       if (num > 0) {
  700.          cp->points = (struct coordinate *)
  701. !         alloc((size_t) num * sizeof(struct coordinate), "curve points");
  702.       } else
  703.          cp->points = (struct coordinate *) NULL;
  704.       cp->next_cp = NULL;
  705. --- 113,119 ----
  706.       cp->p_max = (num >= 0 ? num : 0);
  707.       if (num > 0) {
  708.          cp->points = (struct coordinate *)
  709. !         alloc(num * sizeof(struct coordinate), "curve points");
  710.       } else
  711.          cp->points = (struct coordinate *) NULL;
  712.       cp->next_cp = NULL;
  713. ***************
  714. *** 151,160 ****
  715.       if (num > 0) {
  716.          if (cp->points == NULL) {
  717.             cp->points = (struct coordinate *)
  718. !             alloc((size_t) num * sizeof(struct coordinate), "curve points");
  719.          } else {
  720.             new = (struct coordinate *)
  721. !             realloc(cp->points, (size_t) num * sizeof(struct coordinate));
  722.             if (new == (struct coordinate *) NULL) {
  723.                int_error("No memory available for expanding curve points",
  724.                        NO_CARET);
  725. --- 146,155 ----
  726.       if (num > 0) {
  727.          if (cp->points == NULL) {
  728.             cp->points = (struct coordinate *)
  729. !             alloc(num * sizeof(struct coordinate), "curve points");
  730.          } else {
  731.             new = (struct coordinate *)
  732. !             realloc(cp->points, num * sizeof(struct coordinate));
  733.             if (new == (struct coordinate *) NULL) {
  734.                int_error("No memory available for expanding curve points",
  735.                        NO_CARET);
  736. ***************
  737. *** 197,207 ****
  738.       int num;
  739.   {
  740.       struct iso_curve *ip;
  741. !     ip = (struct iso_curve *) alloc((size_t) sizeof(struct iso_curve), "iso curve");
  742.       ip->p_max = (num >= 0 ? num : 0);
  743.       if (num > 0) {
  744.          ip->points = (struct coordinate *)
  745. !         alloc(((size_t) num) * sizeof(struct coordinate), "iso curve points");
  746.       } else
  747.          ip->points = (struct coordinate *) NULL;
  748.       ip->next = NULL;
  749. --- 192,202 ----
  750.       int num;
  751.   {
  752.       struct iso_curve *ip;
  753. !     ip = (struct iso_curve *) alloc(sizeof(struct iso_curve), "iso curve");
  754.       ip->p_max = (num >= 0 ? num : 0);
  755.       if (num > 0) {
  756.          ip->points = (struct coordinate *)
  757. !         alloc(num * sizeof(struct coordinate), "iso curve points");
  758.       } else
  759.          ip->points = (struct coordinate *) NULL;
  760.       ip->next = NULL;
  761. ***************
  762. *** 232,241 ****
  763.       if (num > 0) {
  764.          if (ip->points == NULL) {
  765.             ip->points = (struct coordinate *)
  766. !             alloc(((size_t) num) * sizeof(struct coordinate), "iso curve points");
  767.          } else {
  768.             new = (struct coordinate *)
  769. !             realloc(ip->points,((size_t) num) * sizeof(struct coordinate));
  770.             if (new == (struct coordinate *) NULL) {
  771.                int_error("No memory available for expanding curve points",
  772.                        NO_CARET);
  773. --- 227,236 ----
  774.       if (num > 0) {
  775.          if (ip->points == NULL) {
  776.             ip->points = (struct coordinate *)
  777. !             alloc(num * sizeof(struct coordinate), "iso curve points");
  778.          } else {
  779.             new = (struct coordinate *)
  780. !             realloc(ip->points, num * sizeof(struct coordinate));
  781.             if (new == (struct coordinate *) NULL) {
  782.                int_error("No memory available for expanding curve points",
  783.                        NO_CARET);
  784. ***************
  785. *** 848,862 ****
  786.    * so it depends on this using malloc().
  787.    */
  788.   
  789. - #ifdef THINK_C
  790. - void *
  791. - alloc(size, message)
  792. -     size_t size;                /* # of bytes */
  793. - #else
  794.   char *
  795.   alloc(size, message)
  796.       unsigned int size;                /* # of bytes */
  797. - #endif
  798.       char *message;            /* description of what is being allocated */
  799.   {
  800.       char *p;                /* the new allocation */
  801. --- 843,851 ----
  802. diff -c src/misc.c ../gnuplot/misc.csrc/parse.c ../gnuplot/parse.c
  803. *** src/parse.c    Mon Jan 27 12:28:16 1992
  804. --- ../gnuplot/parse.c    Fri Sep  6 23:00:07 1991
  805. ***************
  806. *** 62,67 ****
  807. --- 62,68 ----
  808.   static jmp_buf fpe_env;
  809.   
  810.   #define dummy (struct value *) 0
  811. + 
  812.   #ifdef __TURBOC__
  813.   void fpe()
  814.   #else
  815. ***************
  816. *** 74,92 ****
  817.   int an_int;
  818.   #else
  819.   fpe()
  820. ! #endif /* _CRAY */
  821. ! #endif /* __ZTC__ */
  822. ! #endif /* __TURBOC__ */
  823.   {
  824.   #ifdef PC    /* thanks to lotto@wjh12.UUCP for telling us about this  */
  825.       _fpreset();
  826.   #endif
  827. ! 
  828. !     (void) signal(SIGFPE,
  829. !     #ifdef THINK_C 
  830. !     (__sig_func)
  831. !     #endif
  832. !      fpe);
  833.       undefined = TRUE;
  834.       longjmp(fpe_env, TRUE);
  835.   }
  836. --- 75,88 ----
  837.   int an_int;
  838.   #else
  839.   fpe()
  840. ! #endif
  841. ! #endif
  842. ! #endif
  843.   {
  844.   #ifdef PC    /* thanks to lotto@wjh12.UUCP for telling us about this  */
  845.       _fpreset();
  846.   #endif
  847. !     (void) signal(SIGFPE, fpe);
  848.       undefined = TRUE;
  849.       longjmp(fpe_env, TRUE);
  850.   }
  851. ***************
  852. *** 134,144 ****
  853.       reset_stack();
  854.       if (setjmp(fpe_env))
  855.           return;                /* just bail out */
  856. !     (void) signal(SIGFPE, 
  857. !     #ifdef THINK_C
  858. !     (__sig_func)
  859. !     #endif
  860. !     fpe);    /* catch core dumps on FPEs */
  861.   
  862.       execute_at(at_ptr);
  863.   
  864. --- 130,136 ----
  865.       reset_stack();
  866.       if (setjmp(fpe_env))
  867.           return;                /* just bail out */
  868. !     (void) signal(SIGFPE, fpe);    /* catch core dumps on FPEs */
  869.   
  870.       execute_at(at_ptr);
  871.   
  872. ***************
  873. *** 188,199 ****
  874.   perm_at()
  875.   {
  876.   register struct at_type *at_ptr;
  877. ! register size_t len;
  878.   
  879.       (void) temp_at();
  880.       len = sizeof(struct at_type) -
  881.           (MAX_AT_LEN - at.a_count)*sizeof(struct at_entry);
  882. !     at_ptr = (struct at_type *) alloc((size_t) len, "action table");
  883.        (void) memcpy(at_ptr,&at,len);
  884.       return(at_ptr);
  885.   }
  886. --- 180,191 ----
  887.   perm_at()
  888.   {
  889.   register struct at_type *at_ptr;
  890. ! register unsigned int len;
  891.   
  892.       (void) temp_at();
  893.       len = sizeof(struct at_type) -
  894.           (MAX_AT_LEN - at.a_count)*sizeof(struct at_entry);
  895. !     at_ptr = (struct at_type *) alloc(len, "action table");
  896.        (void) memcpy(at_ptr,&at,len);
  897.       return(at_ptr);
  898.   }
  899. ***************
  900. *** 205,211 ****
  901.    */
  902.   memcpy(dest,src,len)
  903.   char *dest,*src;
  904. ! size_t len;
  905.   {
  906.       while (len--)
  907.           *dest++ = *src++;
  908. --- 197,203 ----
  909.    */
  910.   memcpy(dest,src,len)
  911.   char *dest,*src;
  912. ! unsigned int len;
  913.   {
  914.       while (len--)
  915.           *dest++ = *src++;
  916. diff -c src/parse.c ../gnuplot/parse.csrc/plot.c ../gnuplot/plot.c
  917. *** src/plot.c    Tue Jan 21 10:05:36 1992
  918. --- ../gnuplot/plot.c    Fri Sep  6 01:19:10 1991
  919. ***************
  920. *** 132,139 ****
  921.   #ifdef vms
  922.   
  923.   #define HOME "sys$login:"
  924. - #elif  THINK_C
  925. - #define HOME ":"
  926.   
  927.   #else /* vms */
  928.   #ifdef MSDOS
  929. --- 132,137 ----
  930. ***************
  931. *** 155,162 ****
  932.   
  933.   #ifdef unix
  934.   #define PLOTRC ".gnuplot"
  935. - #elif THINK_C
  936. - #define PLOTRC ":gnuplot.ini"
  937.   #else /* unix */
  938.   #if defined(AMIGA_AC_5) || defined(AMIGA_LC_5_1)
  939.   #define PLOTRC ".gnuplot"
  940. --- 153,158 ----
  941. ***************
  942. *** 183,190 ****
  943.       void ss_interrupt();
  944.       (void) signal(SIGINT, ss_interrupt);
  945.   #endif
  946. - #elif THINK_C
  947. -     (void) signal(SIGINT, (__sig_func) inter);
  948.   #else  /* MSDOS */
  949.       (void) signal(SIGINT, inter);
  950.   #endif  /* MSDOS */
  951. --- 179,184 ----
  952. ***************
  953. *** 196,215 ****
  954.       longjmp(env, TRUE);        /* return to prompt */
  955.   }
  956.   
  957. - #ifdef THINK_C
  958. - #include <console.h>
  959. - main()
  960. - {
  961. -     int argc;
  962. -     char **argv;
  963.   
  964. -   argc=ccommand(&argv);
  965. -   unix_main(argc,argv);
  966. -  }
  967. - unix_main(argc,argv)
  968. - #else
  969.   main(argc, argv)
  970. - #endif
  971.       int argc;
  972.       char **argv;
  973.   {
  974. --- 190,197 ----
  975. ***************
  976. *** 310,317 ****
  977.           save_stack();                /* work-around for MSC 4.0/MSDOS 3.x bug */
  978.           (void) signal(SIGINT, ss_interrupt);
  979.   #endif
  980. - #elif THINK_C 
  981. -     (void) signal(SIGINT, (__sig_func) inter);
  982.   #else /* MSDOS */
  983.           (void) signal(SIGINT, inter);    /* go there on interrupt char */
  984.   #endif /* MSDOS */
  985. --- 292,297 ----
  986. ***************
  987. *** 328,335 ****
  988.       /* Look for a gnuplot init file in . or home directory */
  989.   #ifdef vms
  990.       (void) strcpy(home,HOME);
  991. - #elif THINK_C
  992. -     (void) strcat(strcpy(home,getenv(HOME)),":");
  993.   #else /* vms */
  994.   #if defined(AMIGA_AC_5) || defined(AMIGA_LC_5_1)
  995.       strcpy(home,getenv(HOME));
  996. --- 308,313 ----
  997. diff -c src/plot.c ../gnuplot/plot.csrc/plot.h ../gnuplot/plot.h
  998. *** src/plot.h    Wed Feb  5 10:42:39 1992
  999. --- ../gnuplot/plot.h    Fri Sep  6 01:19:11 1991
  1000. ***************
  1001. *** 33,45 ****
  1002.    * Send bug reports to
  1003.    *  pixar!bug-gnuplot@sun.com.
  1004.    */
  1005. - #ifdef THINK_C
  1006. - #define macintosh 0
  1007. - #include <stdlib.h>
  1008. - void * alloc(size_t size, char *message);
  1009. - #define HELPFILE ":docs:gnuplot.gih" /* changed by makefile */
  1010. - #define TERM "TC_console"
  1011. - #endif
  1012.   
  1013.   #define PROGRAM "G N U P L O T"
  1014.   #define PROMPT "gnuplot> "
  1015. --- 33,38 ----
  1016. ***************
  1017. *** 69,81 ****
  1018.   #define MIN_CRV_POINTS 100        /* minimum size of points[] in curve_points */
  1019.   #define MIN_SRF_POINTS 1000        /* minimum size of points[] in surface_points */
  1020.   
  1021. - #ifdef THINK_C
  1022. -     #define MAX_LINE_LEN 256    /* maximum number of chars allowed on line */
  1023. -     #define MAX_TOKENS 64
  1024. -     #define MAX_ID_LEN 32        /* max length of an identifier */
  1025. -     #define MAX_AT_LEN 64        /* max number of entries in action table */
  1026. -     #define STACK_DEPTH 32
  1027. - #else
  1028.   #define MAX_LINE_LEN 1024    /* maximum number of chars allowed on line */
  1029.   #define MAX_TOKENS 200
  1030.   #define MAX_ID_LEN 50        /* max length of an identifier */
  1031. --- 62,67 ----
  1032. ***************
  1033. *** 83,89 ****
  1034.   
  1035.   #define MAX_AT_LEN 150        /* max number of entries in action table */
  1036.   #define STACK_DEPTH 100
  1037. - #endif
  1038.   #define NO_CARET (-1)
  1039.   
  1040.   
  1041. --- 69,74 ----
  1042. ***************
  1043. *** 125,133 ****
  1044.   #define OS "MS-DOS "
  1045.   #endif
  1046.   
  1047. - #ifdef THINK_C
  1048. - #define OS "Mac-OS (with THINK_C 5.0) "
  1049. - #endif
  1050.   
  1051.   #ifndef OS
  1052.   #define OS ""
  1053. --- 110,115 ----
  1054. ***************
  1055. *** 148,160 ****
  1056.   #ifdef PC
  1057.   #include <float.h>
  1058.   #define VERYLARGE FLT_MAX
  1059. - #elif THINK_C
  1060. - #include <float.h>
  1061. - #define VERYLARGE DBL_MAX
  1062. - #define MEMCPY
  1063. - #undef NOCOPY
  1064. - #define NOGAMMA
  1065. - #define MEMSET
  1066.   #else
  1067.   #if defined( vms ) || defined( _CRAY ) || defined( NEXT )
  1068.   #include <float.h>
  1069. --- 130,135 ----
  1070. ***************
  1071. *** 212,218 ****
  1072.   # else 
  1073.   #  ifdef NOCOPY
  1074.       /* use the handwritten memcpy in parse.c */
  1075. - extern int memcpy(char *,char *,size_t);
  1076.   #  else
  1077.       /* assume bcopy is in use */
  1078.   #   define memcpy(dest,src,len) bcopy(src,dest,len)
  1079. --- 187,192 ----
  1080. ***************
  1081. *** 225,235 ****
  1082.    * else, define bzero to that something.
  1083.    */
  1084.   #if defined(MEMSET) || defined(MSDOS)
  1085. ! #define bzero(dest,len)  (void)(memset((void *) dest, (char)NULL, (size_t) len))
  1086.   #endif /* MEMSET || MSDOS */
  1087.   
  1088.   /* Give the name of your gamma function, or undefine it if you have none.  */
  1089. ! #if defined(NOGAMMA) || defined(MSDOS) 
  1090.   # undef GAMMA
  1091.   #else
  1092.   # ifndef GAMMA
  1093. --- 199,209 ----
  1094.    * else, define bzero to that something.
  1095.    */
  1096.   #if defined(MEMSET) || defined(MSDOS)
  1097. ! #define bzero(dest,len)  (void)(memset(dest, (char)NULL, len))
  1098.   #endif /* MEMSET || MSDOS */
  1099.   
  1100.   /* Give the name of your gamma function, or undefine it if you have none.  */
  1101. ! #if defined(NOGAMMA) || defined(MSDOS)
  1102.   # undef GAMMA
  1103.   #else
  1104.   # ifndef GAMMA
  1105. ***************
  1106. *** 487,495 ****
  1107.   extern BOOLEAN undefined;
  1108.   extern struct termentry term_tbl[];
  1109.   
  1110. - #ifndef THINK_C
  1111.   extern char *alloc();
  1112. - #endif
  1113.   /* allocating and managing curve_points structures */
  1114.   extern struct curve_points *cp_alloc();
  1115.   extern int cp_extend();
  1116. --- 461,467 ----
  1117. diff -c src/plot.h ../gnuplot/plot.hsrc/readline.c ../gnuplot/readline.c
  1118. *** src/readline.c    Wed Jan 22 08:15:37 1992
  1119. --- ../gnuplot/readline.c    Wed Sep 11 05:19:46 1991
  1120. ***************
  1121. *** 332,338 ****
  1122.                   case '\r': /* ^M */
  1123.                   cur_line[max_pos+1] = '\0';
  1124.                   putc('\n', stderr);
  1125. !                 new_line = malloc((size_t) strlen(cur_line)+1);
  1126.                   strcpy(new_line,cur_line);
  1127.                   reset_termio();
  1128.                   return(new_line);
  1129. --- 332,338 ----
  1130.                   case '\r': /* ^M */
  1131.                   cur_line[max_pos+1] = '\0';
  1132.                   putc('\n', stderr);
  1133. !                 new_line = malloc(strlen(cur_line)+1);
  1134.                   strcpy(new_line,cur_line);
  1135.                   reset_termio();
  1136.                   return(new_line);
  1137. ***************
  1138. *** 433,439 ****
  1139.   {
  1140.       struct hist *entry;
  1141.       entry = (struct hist *)malloc(sizeof(struct hist));
  1142. !     entry->line = malloc((size_t)strlen(line)+1);
  1143.       strcpy(entry->line, line);
  1144.   
  1145.       entry->prev = history;
  1146. --- 433,439 ----
  1147.   {
  1148.       struct hist *entry;
  1149.       entry = (struct hist *)malloc(sizeof(struct hist));
  1150. !     entry->line = malloc((unsigned int)strlen(line)+1);
  1151.       strcpy(entry->line, line);
  1152.   
  1153.       entry->prev = history;
  1154. diff -c src/readline.c ../gnuplot/readline.csrc/scanner.c ../gnuplot/scanner.c
  1155. *** src/scanner.c    Mon Jan 27 11:51:29 1992
  1156. --- ../gnuplot/scanner.c    Fri Sep  6 01:19:12 1991
  1157. ***************
  1158. *** 264,275 ****
  1159.       int_error("substitution not supported by AmigaDOS!",t_num);
  1160.   }
  1161.   
  1162. - #elif THINK_C
  1163. - substitute(char *str,int max)
  1164. - {
  1165. -     int_error("substitution not supported by MacOS!",t_num);
  1166. - }
  1167. - 
  1168.   #else /* AMIGA_LC_5_1 */
  1169.   
  1170.   substitute(str,max)            /* substitute output from ` ` */
  1171. --- 264,269 ----
  1172. ***************
  1173. *** 279,285 ****
  1174.   register char *last;
  1175.   register int i,c;
  1176.   register FILE *f;
  1177. ! #if defined(AMIGA_AC_5) || defined(THINK_C)
  1178.   int fd;
  1179.   #else
  1180.   FILE *popen();
  1181. --- 273,279 ----
  1182.   register char *last;
  1183.   register int i,c;
  1184.   register FILE *f;
  1185. ! #ifdef AMIGA_AC_5
  1186.   int fd;
  1187.   #else
  1188.   FILE *popen();
  1189. ***************
  1190. *** 313,319 ****
  1191.          if ((f = fopen(MAILBOX,"r")) == NULL)
  1192.              os_error("mailbox open failed",NO_CARET);
  1193.   #else /* vms */
  1194. ! #if defined(AMIGA_AC_5) || defined(THINK_C)
  1195.         if ((fd = open(pgm,"O_RDONLY")) == -1)
  1196.   #else
  1197.         if ((f = popen(pgm,"r")) == NULL)
  1198. --- 307,313 ----
  1199.          if ((f = fopen(MAILBOX,"r")) == NULL)
  1200.              os_error("mailbox open failed",NO_CARET);
  1201.   #else /* vms */
  1202. ! #ifdef AMIGA_AC_5
  1203.         if ((fd = open(pgm,"O_RDONLY")) == -1)
  1204.   #else
  1205.         if ((f = popen(pgm,"r")) == NULL)
  1206. ***************
  1207. *** 325,331 ****
  1208.       while ((c = getc(f)) != EOF) {
  1209.           output[i++] = ((c == '\n') ? ' ' : c);    /* newlines become blanks*/
  1210.           if (i == max) {
  1211. ! #if defined(AMIGA_AC_5) || defined(THINK_C)
  1212.               (void) close(fd);
  1213.   #else
  1214.               (void) pclose(f);
  1215. --- 319,325 ----
  1216.       while ((c = getc(f)) != EOF) {
  1217.           output[i++] = ((c == '\n') ? ' ' : c);    /* newlines become blanks*/
  1218.           if (i == max) {
  1219. ! #ifdef AMIGA_AC_5
  1220.               (void) close(fd);
  1221.   #else
  1222.               (void) pclose(f);
  1223. ***************
  1224. *** 333,339 ****
  1225.               int_error("substitution overflow", t_num);
  1226.           }
  1227.       }
  1228. ! #if defined(AMIGA_AC_5) || defined(THINK_C)
  1229.       (void) close(fd);
  1230.   #else
  1231.       (void) pclose(f);
  1232. --- 327,333 ----
  1233.               int_error("substitution overflow", t_num);
  1234.           }
  1235.       }
  1236. ! #ifdef AMIGA_AC_5
  1237.       (void) close(fd);
  1238.   #else
  1239.       (void) pclose(f);
  1240. ***************
  1241. *** 345,349 ****
  1242.       (void) strcpy(str,output);                /* now replace ` ` with output */
  1243.       screen_ok = FALSE;
  1244.   }
  1245. ! #endif /* AMIGA_LC_5_1 || THINK_C*/
  1246.   #endif /* MS-DOS */
  1247. --- 339,343 ----
  1248.       (void) strcpy(str,output);                /* now replace ` ` with output */
  1249.       screen_ok = FALSE;
  1250.   }
  1251. ! #endif /* AMIGA_LC_5_1 */
  1252.   #endif /* MS-DOS */
  1253. Only in src: set.c
  1254. diff -c src/scanner.c ../gnuplot/scanner.csrc/setshow.c ../gnuplot/setshow.c
  1255. *** src/setshow.c    Sun Feb  2 11:06:01 1992
  1256. --- ../gnuplot/setshow.c    Wed Sep  4 08:22:55 1991
  1257. ***************
  1258. *** 548,579 ****
  1259.               term_init = FALSE;
  1260.               (void) strcpy(outstr,"STDOUT");
  1261.           } else if (!isstring(c_token))
  1262. - #ifdef THINK_C
  1263. -             {     Point where={97,103};
  1264. -                 SFReply reply;
  1265. -                 
  1266. -                 SFPutFile(where,NULL, "\pUntitled",NULL, &reply);
  1267. -                 if( (reply.good) && (SetVol(reply.fName,reply.vRefNum) == noErr)){
  1268. -                     PtoCstr((char *) reply.fName);
  1269. -                     strcpy(testfile,(char *) reply.fName);
  1270. -                     if ((f = fopen(testfile,"w")) == (FILE *)NULL) {
  1271. -                       os_error("cannot open file; output not changed",c_token);
  1272. -                     }
  1273. -                     if (outfile != stdout) /* Never close stdout */
  1274. -                         (void) fclose(outfile);
  1275. -                     outfile = f;
  1276. -                     term_init = FALSE;
  1277. -                     outstr[0] = '\'';
  1278. -                     (void) strcat(strcpy(outstr+1,testfile),"'");
  1279. -                      UP_redirect (1);
  1280. -                 }
  1281. -                 else{
  1282. -                     int_error("expecting filename",c_token);
  1283. -                 }
  1284. -             }
  1285. - #else
  1286.               int_error("expecting filename",c_token);
  1287. - #endif
  1288.           else {
  1289.               quote_str(testfile,c_token);
  1290.   #ifdef unix
  1291. --- 548,554 ----
  1292. ***************
  1293. *** 1229,1235 ****
  1294.       } else {
  1295.          /* adding the label */
  1296.          new_label = (struct text_label *) 
  1297. !         alloc ( (size_t) sizeof(struct text_label), "label");
  1298.          if (prev_label != NULL)
  1299.           prev_label->next = new_label; /* add it to end of list */
  1300.          else 
  1301. --- 1204,1210 ----
  1302.       } else {
  1303.          /* adding the label */
  1304.          new_label = (struct text_label *) 
  1305. !         alloc ( (unsigned int) sizeof(struct text_label), "label");
  1306.          if (prev_label != NULL)
  1307.           prev_label->next = new_label; /* add it to end of list */
  1308.          else 
  1309. ***************
  1310. *** 1444,1450 ****
  1311.       } else {
  1312.          /* adding the arrow */
  1313.          new_arrow = (struct arrow_def *) 
  1314. !         alloc ( (size_t) sizeof(struct arrow_def), "arrow");
  1315.          if (prev_arrow != NULL)
  1316.           prev_arrow->next = new_arrow; /* add it to end of list */
  1317.          else 
  1318. --- 1419,1425 ----
  1319.       } else {
  1320.          /* adding the arrow */
  1321.          new_arrow = (struct arrow_def *) 
  1322. !         alloc ( (unsigned int) sizeof(struct arrow_def), "arrow");
  1323.          if (prev_arrow != NULL)
  1324.           prev_arrow->next = new_arrow; /* add it to end of list */
  1325.          else 
  1326. ***************
  1327. *** 1594,1600 ****
  1328.          /* has a string with it? */
  1329.          if (isstring(c_token)) {
  1330.             quote_str(temp_string,c_token);
  1331. !           tic->label = alloc((size_t)strlen(temp_string)+1, "tic label");
  1332.             (void) strcpy(tic->label, temp_string);
  1333.             c_token++;
  1334.          } else
  1335. --- 1569,1575 ----
  1336.          /* has a string with it? */
  1337.          if (isstring(c_token)) {
  1338.             quote_str(temp_string,c_token);
  1339. !           tic->label = alloc((unsigned int)strlen(temp_string)+1, "tic label");
  1340.             (void) strcpy(tic->label, temp_string);
  1341.             c_token++;
  1342.          } else
  1343. ***************
  1344. *** 2595,2597 ****
  1345. --- 2570,2601 ----
  1346.           udv = udv->next_udv;
  1347.       }
  1348.   }
  1349. + 
  1350. + void                /* used by plot.c */
  1351. + show_version()
  1352. + {
  1353. + extern char version[];
  1354. + extern char patchlevel[];
  1355. + extern char date[];
  1356. + extern char bug_email[];
  1357. + static char *authors[] = {"Thomas Williams","Colin Kelley"}; /* primary */
  1358. + int x;
  1359. + long time();
  1360. + 
  1361. +     x = time((long *)NULL) & 1;
  1362. +     fprintf(stderr,"\n\t%s\n\t%sversion %s\n",
  1363. +         PROGRAM, OS, version); 
  1364. +     fprintf(stderr,"\tpatchlevel %s\n",patchlevel);
  1365. +      fprintf(stderr, "\tlast modified %s\n", date);
  1366. +     fprintf(stderr,"\tCopyright (C) 1986, 1987, 1990, 1991  %s, %s\n",
  1367. +         authors[x],authors[1-x]);
  1368. +     fprintf(stderr, "\n\tSend bugs and comments to %s\n", bug_email);
  1369. + }
  1370. + 
  1371. + 
  1372. + 
  1373. + 
  1374. + 
  1375. + 
  1376. + 
  1377. + 
  1378. Only in src: show.c
  1379. Only in src: show_version.c
  1380. Common subdirectories: src/term and ../gnuplot/term
  1381. diff -c src/setshow.c ../gnuplot/setshow.csrc/term.c ../gnuplot/term.c
  1382. *** src/term.c    Tue Feb  4 12:28:31 1992
  1383. --- ../gnuplot/term.c    Fri Sep  6 01:19:15 1991
  1384. ***************
  1385. *** 239,250 ****
  1386.   }
  1387.   
  1388.   #ifdef DUMB                    /* paper or glass dumb terminal */
  1389. ! #include ":term:dumb.trm"
  1390.   #endif
  1391.   
  1392.   
  1393.   #ifdef PC            /* all PC types */
  1394. ! #include ":term:pc.trm"
  1395.   #endif
  1396.   
  1397.   /*
  1398. --- 239,250 ----
  1399.   }
  1400.   
  1401.   #ifdef DUMB                    /* paper or glass dumb terminal */
  1402. ! #include "term/dumb.trm"
  1403.   #endif
  1404.   
  1405.   
  1406.   #ifdef PC            /* all PC types */
  1407. ! #include "term/pc.trm"
  1408.   #endif
  1409.   
  1410.   /*
  1411. ***************
  1412. *** 283,301 ****
  1413.   #endif
  1414.   
  1415.   #ifdef T410X        /* Tektronix 4106, 4107, 4109 and 420x terminals */
  1416. ! #include ":term:t410x.trm"
  1417.   #endif
  1418.   
  1419.   #ifdef TEK            /* all TEK types, TEK, BBN, SELANAR, KERMIT, VTTEK */
  1420. ! #include ":term:tek.trm"
  1421.   #endif
  1422.   
  1423.   #ifdef EPSONP    /* bit map types, EPSON, NEC, PROPRINTER, STAR Color */
  1424. ! #include ":term:epson.trm"
  1425.   #endif
  1426.   
  1427.   #ifdef HPLJII        /* HP LaserJet II */
  1428. ! #include ":term:hpljii.trm"
  1429.   #endif
  1430.   
  1431.   #ifdef HPLJII /* HP LaserJet III in HPGL mode */
  1432. --- 283,301 ----
  1433.   #endif
  1434.   
  1435.   #ifdef T410X        /* Tektronix 4106, 4107, 4109 and 420x terminals */
  1436. ! #include "term/t410x.trm"
  1437.   #endif
  1438.   
  1439.   #ifdef TEK            /* all TEK types, TEK, BBN, SELANAR, KERMIT, VTTEK */
  1440. ! #include "term/tek.trm"
  1441.   #endif
  1442.   
  1443.   #ifdef EPSONP    /* bit map types, EPSON, NEC, PROPRINTER, STAR Color */
  1444. ! #include "term/epson.trm"
  1445.   #endif
  1446.   
  1447.   #ifdef HPLJII        /* HP LaserJet II */
  1448. ! #include "term/hpljii.trm"
  1449.   #endif
  1450.   
  1451.   #ifdef HPLJII /* HP LaserJet III in HPGL mode */
  1452. ***************
  1453. *** 305,328 ****
  1454.   #endif
  1455.   
  1456.   #ifdef FIG                /* Fig 1.4FS Interactive graphics program */
  1457. ! #include ":term:fig.trm"
  1458. ! #include ":term:bigfig.trm"
  1459.   #endif
  1460.     
  1461.   #ifdef GPR              /* Apollo Graphics Primitive Resource (fixed-size window) */
  1462. ! #include ":term:gpr.trm"
  1463.   #endif /* GPR */
  1464.   
  1465.   #ifdef APOLLO           /* Apollo Graphics Primitive Resource (resizable window) */
  1466. ! #include ":term:apollo.trm"
  1467.   #endif /* APOLLO */
  1468.   
  1469.   #ifdef IMAGEN        /* IMAGEN printer */
  1470. ! #include ":term:imagen.trm"
  1471.   #endif
  1472.   
  1473.   #ifdef EEPIC        /* EEPIC (LATEX) type */
  1474. ! #include ":term:eepic.trm"
  1475.   # ifndef LATEX
  1476.   #  define LATEX
  1477.   # endif
  1478. --- 305,328 ----
  1479.   #endif
  1480.   
  1481.   #ifdef FIG                /* Fig 1.4FS Interactive graphics program */
  1482. ! #include "term/fig.trm"
  1483. ! #include "term/bigfig.trm"
  1484.   #endif
  1485.     
  1486.   #ifdef GPR              /* Apollo Graphics Primitive Resource (fixed-size window) */
  1487. ! #include "term/gpr.trm"
  1488.   #endif /* GPR */
  1489.   
  1490.   #ifdef APOLLO           /* Apollo Graphics Primitive Resource (resizable window) */
  1491. ! #include "term/apollo.trm"
  1492.   #endif /* APOLLO */
  1493.   
  1494.   #ifdef IMAGEN        /* IMAGEN printer */
  1495. ! #include "term/imagen.trm"
  1496.   #endif
  1497.   
  1498.   #ifdef EEPIC        /* EEPIC (LATEX) type */
  1499. ! #include "term/eepic.trm"
  1500.   # ifndef LATEX
  1501.   #  define LATEX
  1502.   # endif
  1503. ***************
  1504. *** 335,370 ****
  1505.   #endif
  1506.   
  1507.   #ifdef LATEX        /* LATEX type */
  1508. ! #include ":term:latex.trm"
  1509.   #endif
  1510.   
  1511.   #ifdef POSTSCRIPT    /* POSTSCRIPT type */
  1512. ! #include ":term:post.trm"
  1513.   #endif
  1514.   
  1515.   #ifdef PRESCRIBE    /* PRESCRIBE type */
  1516. ! #include ":term:kyo.trm"
  1517.   #endif
  1518.   
  1519.   #ifdef UNIXPC     /* unix-PC  ATT 7300 or 3b1 machine */
  1520. ! #include ":term:unixpc.trm"
  1521.   #endif /* UNIXPC */
  1522.   
  1523.   #ifdef AED
  1524. ! #include ":term:aed.trm"
  1525.   #endif /* AED */
  1526.   
  1527.   #ifdef CGI
  1528. ! #include ":term:cgi.trm"
  1529.   #endif /* CGI */
  1530.   
  1531.   #ifdef HP2648
  1532.   /* also works for HP2647 */
  1533. ! #include ":term:hp2648.trm"
  1534.   #endif /* HP2648 */
  1535.   
  1536.   #ifdef HP26
  1537. ! #include ":term:hp26.trm"
  1538.   #endif /* HP26 */
  1539.   
  1540.   #ifdef HP75
  1541. --- 335,370 ----
  1542.   #endif
  1543.   
  1544.   #ifdef LATEX        /* LATEX type */
  1545. ! #include "term/latex.trm"
  1546.   #endif
  1547.   
  1548.   #ifdef POSTSCRIPT    /* POSTSCRIPT type */
  1549. ! #include "term/post.trm"
  1550.   #endif
  1551.   
  1552.   #ifdef PRESCRIBE    /* PRESCRIBE type */
  1553. ! #include "term/kyo.trm"
  1554.   #endif
  1555.   
  1556.   #ifdef UNIXPC     /* unix-PC  ATT 7300 or 3b1 machine */
  1557. ! #include "term/unixpc.trm"
  1558.   #endif /* UNIXPC */
  1559.   
  1560.   #ifdef AED
  1561. ! #include "term/aed.trm"
  1562.   #endif /* AED */
  1563.   
  1564.   #ifdef CGI
  1565. ! #include "term/cgi.trm"
  1566.   #endif /* CGI */
  1567.   
  1568.   #ifdef HP2648
  1569.   /* also works for HP2647 */
  1570. ! #include "term/hp2648.trm"
  1571.   #endif /* HP2648 */
  1572.   
  1573.   #ifdef HP26
  1574. ! #include "term/hp26.trm"
  1575.   #endif /* HP26 */
  1576.   
  1577.   #ifdef HP75
  1578. ***************
  1579. *** 375,434 ****
  1580.   
  1581.   /* HPGL - includes HP75 and HPLJIII in HPGL mode */
  1582.   #ifdef HPGL
  1583. ! #include ":term:hpgl.trm"
  1584.   #endif /* HPGL */
  1585.   
  1586.   /* Roland DXY800A plotter driver by Martin Yii, eln557h@monu3.OZ 
  1587.       and Russell Lang, rjl@monu1.cc.monash.oz */
  1588.   #ifdef DXY800A
  1589. ! #include ":term:dxy.trm"
  1590.   #endif /* DXY800A */
  1591.   
  1592.   #ifdef IRIS4D
  1593. ! #include ":term:iris4d.trm"
  1594.   #endif /* IRIS4D */
  1595.   
  1596.   #ifdef QMS
  1597. ! #include ":term:qms.trm"
  1598.   #endif /* QMS */
  1599.   
  1600.   #ifdef REGIS
  1601. ! #include ":term:regis.trm"
  1602.   #endif /* REGIS */
  1603.   
  1604.   #ifdef SUN
  1605. ! #include ":term:sun.trm"
  1606.   #endif /* SUN */
  1607.   
  1608.   #ifdef VWS
  1609. ! #include ":term:vws.trm"
  1610.   #endif /* VWS */
  1611.   
  1612.   #ifdef V384
  1613. ! #include ":term:v384.trm"
  1614.   #endif /* V384 */
  1615.   
  1616.   #ifdef UNIXPLOT
  1617. ! #include ":term:unixplot.trm"
  1618.   #endif /* UNIXPLOT */
  1619.   
  1620.   #ifdef X11
  1621. ! #include ":term:x11.trm"
  1622.   #endif /* X11 */
  1623.   
  1624.   #ifdef DXF
  1625. ! #include ":term:dxf.trm"
  1626.   #endif /* DXF */
  1627.     
  1628.   #ifdef AMIGASCREEN
  1629. ! #include ":term:amiga.trm"
  1630.   #endif
  1631.   
  1632. - #ifdef THINK_C
  1633. -  #include ":term:THINKC_console.trm" 
  1634. - #endif 
  1635.   
  1636. - 
  1637.   /* Dummy functions for unavailable features */
  1638.   
  1639.   /* change angle of text.  0 is horizontal left to right.
  1640. --- 375,430 ----
  1641.   
  1642.   /* HPGL - includes HP75 and HPLJIII in HPGL mode */
  1643.   #ifdef HPGL
  1644. ! #include "term/hpgl.trm"
  1645.   #endif /* HPGL */
  1646.   
  1647.   /* Roland DXY800A plotter driver by Martin Yii, eln557h@monu3.OZ 
  1648.       and Russell Lang, rjl@monu1.cc.monash.oz */
  1649.   #ifdef DXY800A
  1650. ! #include "term/dxy.trm"
  1651.   #endif /* DXY800A */
  1652.   
  1653.   #ifdef IRIS4D
  1654. ! #include "term/iris4d.trm"
  1655.   #endif /* IRIS4D */
  1656.   
  1657.   #ifdef QMS
  1658. ! #include "term/qms.trm"
  1659.   #endif /* QMS */
  1660.   
  1661.   #ifdef REGIS
  1662. ! #include "term/regis.trm"
  1663.   #endif /* REGIS */
  1664.   
  1665.   #ifdef SUN
  1666. ! #include "term/sun.trm"
  1667.   #endif /* SUN */
  1668.   
  1669.   #ifdef VWS
  1670. ! #include "term/vws.trm"
  1671.   #endif /* VWS */
  1672.   
  1673.   #ifdef V384
  1674. ! #include "term/v384.trm"
  1675.   #endif /* V384 */
  1676.   
  1677.   #ifdef UNIXPLOT
  1678. ! #include "term/unixplot.trm"
  1679.   #endif /* UNIXPLOT */
  1680.   
  1681.   #ifdef X11
  1682. ! #include "term/x11.trm"
  1683.   #endif /* X11 */
  1684.   
  1685.   #ifdef DXF
  1686. ! #include "term/dxf.trm"
  1687.   #endif /* DXF */
  1688.     
  1689.   #ifdef AMIGASCREEN
  1690. ! #include "term/amiga.trm"
  1691.   #endif
  1692.   
  1693.   
  1694.   /* Dummy functions for unavailable features */
  1695.   
  1696.   /* change angle of text.  0 is horizontal left to right.
  1697. ***************
  1698. *** 1045,1059 ****
  1699.          X11_linetype, X11_put_text, null_text_angle, 
  1700.          X11_justify_text, do_point, do_arrow}
  1701.   #endif
  1702. - 
  1703. - #ifdef THINK_C
  1704. -      ,{"TC_console", "THINK_C console enviroment",
  1705. -        TC_XMAX, TC_YMAX, TC_VCHAR, TC_HCHAR, 
  1706. -        TC_VTIC, TC_HTIC, options_null,TC_init, TC_reset, 
  1707. -        TC_text, null_scale, TC_graphics, TC_move, TC_vector,
  1708. -        TC_linetype, TC_put_text, null_text_angle, 
  1709. -        null_justify_text, line_and_point, do_arrow} /* Think Console ++ */
  1710. - #endif
  1711.   };
  1712.   
  1713.   #define TERMCOUNT (sizeof(term_tbl)/sizeof(struct termentry))
  1714. --- 1041,1046 ----
  1715. ***************
  1716. *** 1177,1183 ****
  1717.   #endif /* sun */
  1718.   
  1719.   #ifdef GPR
  1720. !    if (gpr_isa_pad()) term_name = "gpr";       /* find out whether stdout is a DM pad. See :term:gpr.trm */
  1721.   #else
  1722.   #ifdef APOLLO
  1723.      if (apollo_isa_pad()) term_name = "apollo"; /* find out whether stdout is a DM pad. See term/apollo.trm */
  1724. --- 1164,1170 ----
  1725.   #endif /* sun */
  1726.   
  1727.   #ifdef GPR
  1728. !    if (gpr_isa_pad()) term_name = "gpr";       /* find out whether stdout is a DM pad. See term/gpr.trm */
  1729.   #else
  1730.   #ifdef APOLLO
  1731.      if (apollo_isa_pad()) term_name = "apollo"; /* find out whether stdout is a DM pad. See term/apollo.trm */
  1732. diff -c src/term.c ../gnuplot/term.csrc/term.h ../gnuplot/term.h
  1733. *** src/term.h    Sat Jan 25 12:50:56 1992
  1734. --- ../gnuplot/term.h    Fri Sep  6 01:19:16 1991
  1735. ***************
  1736. *** 44,101 ****
  1737.    */
  1738.   
  1739.   /* These terminals are not relevant for MSDOS */
  1740. ! #ifndef THINK_C
  1741. !     #ifndef MSDOS
  1742. !     
  1743. !     #ifdef AMIGA_LC_5_1
  1744. !     #define AMIGASCREEN    /* Amiga custom screen */
  1745. !     
  1746. !     #else /* AMIGA_LC_5_1 */
  1747. !     
  1748. !     #ifdef AMIGA_AC_5
  1749. !     #define AMIGASCREEN    /* Amiga custom screen */
  1750. !     #endif
  1751. !     #define AED        /* AED 512 and AED 767 */
  1752. !     #define BITGRAPH    /* BBN BitGraph */
  1753. !     /* #define CGI        /* SCO CGI */
  1754. !     /* #define IRIS4D    /* IRIS4D series computer */
  1755. !     #define KERMIT        /* MS-Kermit Tektronix 4010 emulator */
  1756. !     #define FIG           /* Fig graphics language */
  1757. !     #define REGIS        /* ReGis graphics (vt125, vt220, vt240, Gigis...) */
  1758. !     #define SELANAR        /* Selanar */
  1759. !     /* #define SUN        /* Sun Microsystems Workstation */
  1760. !     #define T410X        /* Tektronix 4106, 4107, 4109 and 420x terminals */
  1761. !     #define TEK        /* Tektronix 4010, and probably others */
  1762. !     /* #define UNIXPC    /* unixpc (ATT 3b1 or ATT 7300) */
  1763. !     /* #define UNIXPLOT    /* unixplot */
  1764. !     #define VTTEK        /* VT-like tek40xx emulators */
  1765. !     /* #define X11        /* X11R4 window system */
  1766. !     
  1767. !     #endif /* AMIGA_LC_5_1 */
  1768. !     
  1769. !     #define DXY800A        /* Roland DXY800A plotter */
  1770. !     
  1771. !     #define HP2648        /* HP2648, HP2647 */
  1772. !     #define HP26        /* HP2623A and maybe others */
  1773. !     #define HP75        /* HP7580, and probably other HPs */
  1774. !     #define IMAGEN      /* Imagen laser printers (300dpi) (requires -Iterm also) */
  1775. !     
  1776. !     #define NEC        /* NEC CP6 pinwriter printer */
  1777. !     #define PRESCRIBE    /* Kyocera Laser printer */
  1778. !     #define QMS        /* QMS/QUIC laserprinter (Talaris 1200 and others) */
  1779. !     #define STARC        /* Star Color Printer */
  1780. !     #define TANDY60        /* Tandy DMP-130 series 60-dot per inch graphics */
  1781. !     #define V384        /* Vectrix 384 and tandy color printer */
  1782. !     
  1783. !     #endif /* not MSDOS */
  1784. ! #else /* THINK_C */
  1785. !      #define KERMIT        /* MS-Kermit Tektronix 4010 emulator */
  1786. !     #define T410X        /* Tektronix 4106, 4107, 4109 and 420x terminals */
  1787. !     #define TEK        /* Tektronix 4010, and probably others */
  1788. !     #define VTTEK        /* VT-like tek40xx emulators */
  1789. !      #define DXF        /* DXF format for use with AutoCad (Release 10.x) */
  1790.   #endif
  1791.   
  1792.   /* These terminals can be used on any system */
  1793.   #define DUMB
  1794.   
  1795. --- 44,93 ----
  1796.    */
  1797.   
  1798.   /* These terminals are not relevant for MSDOS */
  1799. ! #ifndef MSDOS
  1800. ! 
  1801. ! #ifdef AMIGA_LC_5_1
  1802. ! #define AMIGASCREEN    /* Amiga custom screen */
  1803. ! 
  1804. ! #else /* AMIGA_LC_5_1 */
  1805. ! 
  1806. ! #ifdef AMIGA_AC_5
  1807. ! #define AMIGASCREEN    /* Amiga custom screen */
  1808.   #endif
  1809. + #define AED        /* AED 512 and AED 767 */
  1810. + #define BITGRAPH    /* BBN BitGraph */
  1811. + /* #define CGI        /* SCO CGI */
  1812. + /* #define IRIS4D    /* IRIS4D series computer */
  1813. + #define KERMIT        /* MS-Kermit Tektronix 4010 emulator */
  1814. + #define FIG           /* Fig graphics language */
  1815. + #define REGIS        /* ReGis graphics (vt125, vt220, vt240, Gigis...) */
  1816. + #define SELANAR        /* Selanar */
  1817. + /* #define SUN        /* Sun Microsystems Workstation */
  1818. + #define T410X        /* Tektronix 4106, 4107, 4109 and 420x terminals */
  1819. + #define TEK        /* Tektronix 4010, and probably others */
  1820. + /* #define UNIXPC    /* unixpc (ATT 3b1 or ATT 7300) */
  1821. + /* #define UNIXPLOT    /* unixplot */
  1822. + #define VTTEK        /* VT-like tek40xx emulators */
  1823. + /* #define X11        /* X11R4 window system */
  1824.   
  1825. + #endif /* AMIGA_LC_5_1 */
  1826. + 
  1827. + #define DXY800A        /* Roland DXY800A plotter */
  1828. + 
  1829. + #define HP2648        /* HP2648, HP2647 */
  1830. + #define HP26        /* HP2623A and maybe others */
  1831. + #define HP75        /* HP7580, and probably other HPs */
  1832. + #define IMAGEN      /* Imagen laser printers (300dpi) (requires -Iterm also) */
  1833. + 
  1834. + #define NEC        /* NEC CP6 pinwriter printer */
  1835. + #define PRESCRIBE    /* Kyocera Laser printer */
  1836. + #define QMS        /* QMS/QUIC laserprinter (Talaris 1200 and others) */
  1837. + #define STARC        /* Star Color Printer */
  1838. + #define TANDY60        /* Tandy DMP-130 series 60-dot per inch graphics */
  1839. + #define V384        /* Vectrix 384 and tandy color printer */
  1840. + 
  1841. + #endif /* MSDOS */
  1842. + 
  1843.   /* These terminals can be used on any system */
  1844.   #define DUMB
  1845.   
  1846. ***************
  1847. *** 109,125 ****
  1848.   #define EMTEX        /* LATEX picture environment with EMTEX specials */
  1849.   #define EPS60        /* Epson-style 60-dot per inch printers */
  1850.   #define EPSONP        /* Epson LX-800, Star NL-10, NX-1000 and lots of others */
  1851. ! /* #define HPLJII        /* HP LaserJet II */
  1852.   #define LATEX        /* LATEX picture environment */
  1853.   
  1854.   /* These are for MSDOS only */
  1855.   #ifdef MSDOS
  1856. !     #ifdef __TURBOC__
  1857. !         #define ATT6300        /* AT&T 6300 graphics */
  1858. !     #else
  1859. !         #define ATT6300        /* AT&T 6300 graphics */
  1860. !         #define CORONA        /* Corona graphics 325 */
  1861. !         #define HERCULES    /* IBM PC/Clone with Hercules graphics board */
  1862. !     #endif /* __TURBOC__ */
  1863.   #endif /* MSDOS */
  1864.   
  1865. --- 101,117 ----
  1866.   #define EMTEX        /* LATEX picture environment with EMTEX specials */
  1867.   #define EPS60        /* Epson-style 60-dot per inch printers */
  1868.   #define EPSONP        /* Epson LX-800, Star NL-10, NX-1000 and lots of others */
  1869. ! #define HPLJII        /* HP LaserJet II */
  1870.   #define LATEX        /* LATEX picture environment */
  1871.   
  1872.   /* These are for MSDOS only */
  1873.   #ifdef MSDOS
  1874. ! #ifdef __TURBOC__
  1875. ! #define ATT6300        /* AT&T 6300 graphics */
  1876. ! #else
  1877. ! #define ATT6300        /* AT&T 6300 graphics */
  1878. ! #define CORONA        /* Corona graphics 325 */
  1879. ! #define HERCULES    /* IBM PC/Clone with Hercules graphics board */
  1880. ! #endif /* __TURBOC__ */
  1881.   #endif /* MSDOS */
  1882.   
  1883. diff -c src/term.h ../gnuplot/term.hsrc/util.c ../gnuplot/util.c
  1884. *** src/util.c    Mon Jan 27 11:29:59 1992
  1885. --- ../gnuplot/util.c    Sun Sep  8 23:01:17 1991
  1886. ***************
  1887. *** 47,58 ****
  1888.   
  1889.   #ifndef vms
  1890.   #ifndef __ZTC__
  1891. - #ifndef THNK_C
  1892.   extern int errno;
  1893.   extern int sys_nerr;
  1894.   extern char *sys_errlist[];
  1895.   #endif
  1896. - #endif
  1897.   #endif /* vms */
  1898.   
  1899.   extern char input_line[];
  1900. --- 47,56 ----
  1901. ***************
  1902. *** 515,522 ****
  1903.       (void) putc('\n',stderr);
  1904.   #else
  1905.   #ifdef __ZTC__
  1906. -     fprintf(stderr,"error number %d\n\n",errno);
  1907. - #elif THINK_C
  1908.       fprintf(stderr,"error number %d\n\n",errno);
  1909.   #else
  1910.       if (errno >= sys_nerr)
  1911. --- 513,518 ----
  1912.  
  1913.  
  1914.  
  1915.